home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HTBasic 9.3
/
HTBasic 9.3.iso
/
61win
/
data1.cab
/
Lexical_Order_files
/
SETKBD.BAS
< prev
next >
Wrap
BASIC Source File
|
2001-03-02
|
268b
|
10 lines
10 !SETKBD.BAS
20 DIM Pc2hp$[256]
30 CLEAR SCREEN
40 PRINT "Set up translation string to Roman-8"
60 ASSIGN @Io TO "L1TOR8.KBD" !Use PCTOR8 for code pages 437 or 850
70 ENTER @Io;Pc2hp$
80 ASSIGN @Io TO *
90 CONFIGURE KBD 0 TO Pc2hp$
100 END